home *** CD-ROM | disk | FTP | other *** search
/ internet.au CDrom 42 / NETCD42.iso / chat / mac / snak.hqx / Snak 2.0b4 / Scripts / pp-kicks.irc < prev    next >
Encoding:
Text File  |  1996-03-22  |  9.5 KB  |  343 lines
  1. # ########################################################################## #
  2. #                      PurePak - The sequel to TextBox                       #
  3. #                          A -+ TEXT +- production                           #
  4. # ########################################################################## #
  5. # Author: Crypt Keeper [ckeeper@axiom.access.one.net] (CKeeper on IRC)
  6. # Version 2.07
  7. #
  8. # This script requires at least ircII2.2.9 (Unix) or a fully ircII compatible
  9. # client.  It has only been tested under Unix with ircII2.2.9 and ircII2.8.
  10. #
  11. # If you edit this file, you must edit it with a Unix text editor or use
  12. # utilities like dos2unix/unix2dos to convert it to DOS to edit and then
  13. # back to Unix.  If it is edited in a DOS text editor it will be corrupted.
  14. #
  15. # PurePak version 2.07 IRC script
  16. # Copyright (C) 1995
  17. #
  18. # This program is free software; you can redistribute it and/or modify
  19. # it under the terms of the GNU General Public License as published by
  20. # the Free Software Foundation; either version 1, or (at your option)
  21. # any later version.
  22. #
  23. # This program is distributed in the hope that it will be useful,
  24. # but WITHOUT ANY WARRANTY; without even the implied warranty of
  25. # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  26. # GNU General Public License for more details.
  27. #
  28. # You should have received a copy of the GNU General Public License
  29. # along with this program; if not, write to the Free Software
  30. # Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  31. # ########################################################################## #
  32.  
  33. # Splatterkicks
  34.  
  35. EVAL ^if (!(PPVERS)) {/echo *** pp-kicks.irc is not a stand-alone script.  It must be loaded after purepak.irc;//exit}
  36. @ PP.KICKS = 1
  37.  
  38. # ----------------------------------------------------------------------------
  39. # Splatterkicks (many of these taken from other scripts, namely PhoEniX)
  40. # ----------------------------------------------------------------------------
  41.  
  42. alias sk.0 {
  43.     me smells something bad...
  44.     me looks at $0
  45.     sk.k $0
  46. }
  47. alias sk.1 {
  48.     me points the BFG-9000 at $0 and pulls the trigger
  49.     me listens for the "AYAAAAAAAHHHHH!!!!"
  50.     me laughs as $0 is blown back 20 feet and his hollowed out carcass slams against the wall!
  51.     sk.k $0
  52. }
  53. alias sk.2 {
  54.     me turns on some tunes...
  55.     me grabs a dancing flower and shoves it up $0's butt!
  56.     me watches as $0 goes through several interesting convulsions
  57.     sk.k $0
  58. }
  59. alias sk.3 {
  60.     sendto $C $0:
  61.     sendto $C What is your name?
  62.     sendto $C What is your quest?
  63.     sendto $C What is the airspeed velocity of an unlaiden swallow???
  64.     sk.k $0
  65. }
  66. alias sk.4 {
  67.     me grabs $0 by the hair and jams his face into the toilet...
  68.     me does the royal flush!
  69.     sk.k $0
  70. }
  71. alias sk.5 {
  72.     me pulls out his portable chalkboard..
  73.     me shows $0 the function of relativity for chaos mathematics
  74.     me watches as $0's brain explodes in a puff of putrid smoke!
  75.     sk.k $0
  76. }
  77. alias sk.6 {
  78.     me decides to use calculus on $0
  79.     me takes the second derivative of $0
  80.     me is astonished!  He has just disproven $0's existance!
  81.     sk.k $0
  82. }
  83. alias sk.7 {
  84.     me THiNKZ DaT $0 HaZ aNGeReD Da iRC DaeMoNS!#!!!#!%!11!
  85.     me SeNDZ $0's SoUL To a FaTe WoRSe THaN DeaTH: /DeV/NuLL!#!!11!!!
  86.     sk.k $0
  87. }
  88. alias sk.8 {
  89.     me *** LAMER PROTECTION ENGAGED ***
  90.     me *** TARGETTING LAMER
  91.     sk.k $0
  92.     me *** LAMER REMOVAL COMPLETE
  93. }
  94. alias sk.9 {
  95.     me suggests that $0 do his Kurt Kobain impression..
  96.     me hands $0 a shotgun
  97.     sk.k $0
  98. }
  99. alias sk.10 {
  100.     me waves an ancient druid sceptre over $0
  101.     me chants "KLATU! VERATTA! NIKTU!"
  102.     me waits as nothing happens
  103.     me says "screw this!" and shoves the sceptre up $0's butt!
  104.     sk.k $0
  105. }
  106. alias sk.11 {
  107.     me waves a magic sceptre over $0's head
  108.     me summons $0's worst nightmares to devour him
  109.     me watches as $0 is chased off the channel by Roseanne Arnold
  110.     sk.k $0
  111. }
  112. alias sk.12 {
  113.     me dares $0 to go to #twilight_zone and ask for a copy of PhoEniX!
  114.     me watches as $0 is killed a few times and banned from his server...
  115.     sk.k $0
  116. }
  117. alias sk.13 {
  118.     me points his magic wand at $0
  119.     me casts Evard's black tentacles at $0
  120.     me watches as $0 is dragged under the surface of the tub!
  121.     sk.k $0
  122. }
  123. alias sk.14 {
  124.     me grabs $0's nostril and stretches it WAAAY open!
  125.     me shoves a running chainsaw up $0's nostril and lets go
  126.     sk.k $0
  127. }
  128. alias sk.15 {
  129.     me holds a vial of a deadly substance over $0's head
  130.     me breaks the vial, spilling the poison on $0!
  131.     me laughs as $0 turns into... MiSTiK!!!
  132.     sk.k $0
  133. }
  134. alias sk.16 {
  135.     me points his magic wand at $0
  136.     me shoots a flaming ball at $0 and watches as his life drains away...
  137.     sendto $C Life?!?!?  He's on IRC all the damn time!
  138.     sk.k $0
  139. }
  140. alias sk.17 {
  141.     me looks at $0
  142.     me types '/kick' as fast as he can...
  143.     sk.k $0
  144. }
  145. alias sk.18 {
  146.     me passes $0 the medicated facewash...
  147.     sendto $C You're putting too much strain on that monitor!
  148.     sk.k $0
  149. }
  150. alias sk.19 {
  151.     ^Userhost $0 -CMD if ([$3]) {
  152.         if ([$3] != [<UNKNOWN>])
  153.         {
  154.             sendto $C *** $0 is $3@$4 \(I'm a lamer!\)
  155.             sendto $C *** on channels: @#netsex #teensex @#gaysex #warez10 #twilight_zone
  156.             me turns the other way, pukes, and boots $0
  157.             sk.k $0
  158.         } {/echo *** $0 is not on IRC}
  159.     }
  160. }
  161. alias sk.20 {
  162.     me spits out a wad of tobacco
  163.     sendto $C *shplit*
  164.     me looks at $0
  165.     sendto $C We don't like yer kind 'round here, so git b'fore eh shuve
  166.     sendto $C dis here shotgun up yer yankee butt...
  167.     sk.k $0
  168.     sendto $C Mayn, dat boy shure had nice teeth!
  169. }
  170. alias sk.21 {
  171.     me chills $0 to absolute zero, stopping atomic motion and causing him to collapse in on himself and create a small black hole...
  172.     sk.k $0
  173. }
  174. alias sk.22 {
  175.     me gets a wild grin on his face...
  176.     me grabs a can of liquid nitrogen and pours it down $0's crotch!
  177.     sk.k $0
  178. }
  179. alias sk.23 {
  180.     sendto $C $0: I have only one word to describe you...
  181.     sendto $C <BUUUUURRRRRRRRRRPPPPPPP>
  182.     sk.k $0
  183. }
  184. alias sk.24 {
  185.     me looks at $0
  186.     me looks at his toilet
  187.     me looks at his cat's butt
  188.     me looks at $0's mom
  189.     me looks at $0
  190.     sk.k $0
  191. }
  192. alias sk.25 {
  193.     sendto $C "I think therefore I am."
  194.     sendto $C Hmm.. I guess $0 isn't.
  195.     sk.k $0
  196. }
  197. alias sk.26 {
  198.     sendto $C $0... I'm not surprised.
  199.     sendto $C As a matter of fact, I think I'm gonna have a heart attack and die from my non-surprise.
  200.     sk.k $0
  201. }
  202. alias sk.27 {
  203.     sendto $C $0... Can I borrow your head?
  204.     sendto $C for my rock garden
  205.     sk.k $0
  206. }
  207. alias sk.28 {
  208.     sendto $C $0... Is that your head or did someone figure out a way to grow hair on a dildo?!?!?
  209.     sk.k $0
  210. }
  211. alias sk.29 {
  212.     sendto $C $0... I heard you are bi...
  213.     sendto $C When you want sex, you buy!
  214.     sk.k $0
  215. }
  216. alias sk.30 {
  217.     me snaps his fingers and a Tasmanian Devil appears.
  218.     me points at $0 and utters the magic word...
  219.     sendto $C food (i.e. Bunny Rabbit)
  220.     sk.k $0
  221. }
  222. alias sk.31 {
  223.     sendto $C When $0 was made, a huge glorious thundering voice sounded from the heavens above and said:
  224.     sleep 1
  225.     sendto $C Oops...
  226.     sk.k $0
  227. }
  228. alias sk.32 {
  229.     me grabs a pair of headphones and clamps them to $0's head.
  230.     me cranks up "Achy Breaky Heart!"
  231.     sendto $C Kills 'em every time!
  232.     sk.k $0
  233. }
  234. alias sk.33 {
  235.     me notices that $0 is on this channel.
  236.     sendto $C We'll fix that!
  237.     sk.k $0
  238. }
  239. alias sk.34 {
  240.     sendto $C WHOOOA!! $0!! WHOooOOA!
  241.     sendto $C when I say whoa, I mean WHOA!
  242.     sk.k $0
  243.     sendto $C $0's is sooo stupid...
  244. }
  245. alias sk.35 {
  246.     sendto $C $0... Have you ever danced with the devil in the pale moonlight?
  247.     sendto $C Ahh... I see you've been rubbing my rhubarb..
  248.     sk.k $0
  249. }
  250. alias sk.36 {
  251.     me decides there is a better use for $0's net connection
  252.     me shoves $0's T1 internet line up his butt 
  253.     sk.k $0
  254. }
  255. alias sk.37 {
  256.     sendto $C I've got it!
  257.     sendto $C $N killed $0 with the lead pipe on ${C}!
  258.     sk.k $0
  259. }
  260. alias sk.38 {
  261.     me points his magic wand at $0 and speaks in an arcane tongue as his eyes turn red..
  262.     me teleports $0 to.... Area 51!
  263.     me wonders if the next civilization will find $0 in an empty fuel drum buried under 5 feet of concrete??
  264.     sk.k $0
  265. }
  266. alias sk.39 {
  267.     sendto $C What the hell is that smell?
  268.     sk.k $0
  269.     sendto $C Ok.. it's gone
  270. }
  271. alias sk.40 {
  272.     sendto $C $0 is an ugly, stupid, fat, smelly, retarded geek with no life.
  273.     sendto $C Did I leave anything out?
  274.     sk.k $0
  275. }
  276. alias sk.41 {
  277.     sendto $C alias test \{//kick $C $0\}
  278.     sk.k $0
  279.     sendto $C Cool.. it works!
  280. }
  281. alias sk.42 {
  282.     me change "+il 1" on channel $C by $0
  283.     sk.k $0
  284.     me change "-il" on channel $C by $N
  285.     sendto $C Damn takeover attempts!
  286. }
  287. alias sk.43 {
  288.     me thinks he sees a clonebot!
  289.     sk.k $0
  290.     sendto $C Well, it wasn't much more than a clonebot...
  291. }
  292. alias sk.44 {
  293.     me change "+o $0" on channel $C by $S
  294.     sendto $C *** Netsplit hack detected ***
  295.     sk.k $0
  296. }
  297. alias sk.45 {
  298.     me hands $0 a slice of red meat...
  299.     sendto $C Here, it'll make you run faster!
  300.     me unleashes the dobermans.
  301.     sk.k $0
  302. }
  303. alias sk.46 {
  304.     me sneaks into $0's car...
  305.     me replaces $0's MegadetH CD with the new Enigma CD!
  306.     me laughs as $0 falls asleep at the wheel and crashes...
  307.     sk.k $0
  308. }
  309. alias sk.47 {
  310.     me waves his magic wand at $0 and utters magic words in an arcane tongue...
  311.     me sends a fireball streaking across the channel at $0
  312.     sk.k $0
  313. }
  314. alias sk.48 {
  315.     me decides to become a priest and take an oath of chastity...
  316.     sendto $C After seeing $0's face!
  317.     sk.k $0
  318. }
  319. alias sk.49 {
  320.     sendto $C Jack and Jill went up the hill,
  321.     sendto $C Each with a buck and a Quarter
  322.     sendto $C $0 came down with $2.50
  323.     sendto $C What a whore!
  324.     sk.k $0
  325. }
  326. alias sk.50 {
  327.     sendto $C Hey, $0!  Shut up or I'll wound your inner child!
  328.     sendto $C And then I'll kick your ass!
  329.     sk.k $0
  330. }
  331.  
  332. alias sk.k {//kick $C $0 | -+ TEXT +- |}
  333.  
  334. # sk <nick> [<kick#>]
  335. alias sk {
  336.     if ([$1]) {^if (!isalpha($1)) {/EVAL /sk.$1 $0} {/echo *** /sk <nick> [<kick #>] (kick # range = 0-50)}}
  337.     {^if ([$0]) {/EVAL /sk.$rand(51) $0} {/sk a a}}
  338. }
  339.  
  340. # ----------------------------------------------------------------------------
  341.  
  342. EVAL ^if (!PP.SET.NOSTARTUP) {/echo -- PurePak splatterkicks module loaded}
  343.